10 REM z.r.m. 
100 WINDOPEN
1000 IF
101 CURS
1010 IF
1011 IF
1012 IF
1013 IF
1014 IF
1015 IF
1016 IF
1017 IF
1018 IF
1019 IF
1020 IF
1021 IF
1025 VARNAME
1030 VARNAME
1099 RETURN
110 LOCATE
111 LOCATE
120 LOCATE
130 LOCATE
140 LOCATE
150 LOCATE
160 LOCATE
180 LOCATE
200 FOR
2000 REM + - x /
2005 VARNAME
2010 IF
2020 IF
2030 IF
2040 IF
2050 VARNAME
2099 RETURN
210 SET ZONE
220 NEXT
300 REPEAT
3000 REM =
3001 BELL
3010 IF
3020 IF
3030 IF
3040 IF
3050 VARNAME
3099 RETURN
310 IF
400 IF
4000 SHOOT
4010 WINDEL
4020 END
410 IF
420 IF
430 IF
440 IF
450 IF
460 IF
470 IF
480 IF
490 IF
500 IF
505 IF
510 LOCATE
590 WHILE
599 GOTO